home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / gfx / misc / VideoEasel.lha / Video Easel / CAMRexx / HPP-Gas.rexx < prev    next >
OS/2 REXX Batch file  |  1995-03-31  |  223b  |  13 lines
  1. /* HPP-Gas by an idea of Toffoli, in CAMRexx by THOR */
  2.  
  3. MakeAlgorithm:
  4.    PLANEALGORITHM margolus hvcenters
  5. return
  6.  
  7. MakePlane:
  8.    if center=opp & cw=ccw & center~=cw then
  9.          SETPLANE cw
  10.    else  SETPLANE opp
  11. return
  12.  
  13.